#ifndef __M_MATCHER_H__
#define __M_MATCHER_H__
#include "util.hpp"
#include "online.hpp"
#include "db.hpp"
#include "room.hpp"
#include <list>
#include <mutex>
#include <condition_variable>

template<class T>
class match_queue
{
    private:
        //用链表而不直接使用queue是因为有中间删除数据的需要
        std::list<T> _list;
        //实现线程安全
        std::mutex _mutex;
        //这个条件变量主要为了阻塞消费者，后边使用的时候：队列中元素个数<2则阻塞
        std::condition_variable _cond;
    public:
        //获取元素个数
        int size()
        {
            std::unique_lock<std::mutex> lock(_mutex);
            return _list.size();
        }
        //判断是否为空
        bool empty()
        {
            std::unique_lock<std::mutex> lock(_mutex);
            return _list.empty();
        }
        //阻塞线程
        void wait()
        {
            std::unique_lock<std::mutex> lock(_mutex);
            _cond.wait(lock);
        }
        //入队数据，并唤醒线程
        void push(const T& data)
        {
            std::unique_lock<std::mutex> lock(_mutex);
            _list.push_back(data);
            _cond.notify_all();
        }
        //出队数据
        bool pop(T& data)
        {
            std::unique_lock<std::mutex> lock(_mutex);
            if(_list.empty() == true)
            {
                return false;
            }
            data = _list.front();
            _list.pop_front();
            return true;
        }
        //移除指定的数据
        void remove(T& data)
        {
            std::unique_lock<std::mutex> lock(_mutex);
            _list.remove(data);
        }
};

class matcher
{
    private:
        //普通选手匹配队列
        match_queue<uint64_t> _q_normal;
        //高手匹配队列
        match_queue<uint64_t> _q_high;
        //大神匹配队列
        match_queue<uint64_t> _q_super;
        //对应三个匹配队列的处理线程
        std::thread _th_normal;
        std::thread _th_high;
        std::thread _th_super;
        room_manager *_rm;
        user_table *_ut;
        online_manager *_om;
    private:
        void handle_match(match_queue<uint64_t> &mq)
        {
            while(1)
            {
                //判断队列人数是否大于2，<2则阻塞等待
                while(mq.size() < 2)
                {
                    mq.wait();
                }
                //走到这里代表人数够了，出队两个玩家
                uint64_t uid1, uid2;
                bool ret = mq.pop(uid1);
                if(ret == false)
                {
                    continue;
                }
                ret = mq.pop(uid2);
                if(ret == false)
                {
                    this->add(uid1);
                    continue;
                }
                //检验两个玩家是否同时在线，如果有一个掉线，则要把另一个人
                //重新加入队列
                wsserver_t::connection_ptr conn1 = _om->get_conn_from_hall(uid1);
                if(conn1.get() == nullptr)
                {
                    this->add(uid2);
                    continue;
                }
                wsserver_t::connection_ptr conn2 = _om->get_conn_from_hall(uid2);
                if(conn2.get() == nullptr)
                {
                    this->add(uid1);
                    continue;
                }
                //为两个玩家创建房间，并把玩家加到房间中
                room_ptr rp = _rm->create_room(uid1, uid2);
                if(rp.get() == nullptr)
                {
                    this->add(uid1);
                    this->add(uid2);
                    continue;
                }
                //对两个玩家进行响应
                Json::Value resp;
                resp["optype"] = "match_success";
                resp["result"] = true;
                std::string body;
                json_util::serialize(resp, body);
                conn1->send(body);
                conn2->send(body);
            }
        }
        void _th_normal_entry(){
            return handle_match(_q_normal);
        }
        void _th_high_entry(){
            return handle_match(_q_high);
        }
        void _th_super_entry(){
            return handle_match(_q_super);
        }
    public:
        matcher(room_manager *rm, user_table *ut, online_manager *om):
            _rm(rm),_ut(ut),_om(om),
            _th_normal(std::thread(&matcher::_th_normal_entry, this)),
            _th_high(std::thread(&matcher::_th_high_entry, this)),
            _th_super(std::thread(&matcher::_th_super_entry, this))
        {
            DLOG("游戏模块初始化完毕");
        }
        bool add(uint64_t uid)
        {
            // 根据玩家的天梯分数，来判定玩家档次，添加到不同的匹配队列
            // 根据用户ID，获取玩家信息
            Json::Value user;
            bool ret = _ut->select_by_id(uid, user);
            if(ret == false)
            {
                DLOG("获取玩家:%d信息失败", uid);
                return false;
            }
            int score = user["score"].asInt();
            //添加到指定的队列中
            if(score < 2000)
            {
                _q_normal.push(uid);
            }
            else if(score >= 2000 && score < 3000)
            {
                _q_high.push(uid);
            }
            else
            {
                _q_super.push(uid);
            }
            return true;
        }
        bool del(uint64_t uid)
        {
            Json::Value user;
            bool ret = _ut->select_by_id(uid, user);
            if(ret == false)
            {
                DLOG("获取玩家:%d信息失败", uid);
                return false;
            }
            int score = user["score"].asInt();
            //从指定的队列中删除
            if(score < 2000)
            {
                _q_normal.remove(uid);
            }
            else if(score >= 2000 && score < 3000)
            {
                _q_high.remove(uid);
            }
            else
            {
                _q_super.remove(uid);
            }
            return true;
        }
};

#endif